Marcus,

In playing around with the API I have run into the same problem, however I discovered that a declared API call can have an accountKey hard coded into the constructor. So what I did was declared one EveAPI without a accountKey to fetch a list of accounts, and then looped through the accounts using a second EveAPI object to fetch the data. Like so...:

Dim eveAPI As New EveAI.Live.EveApi(keyID, vCode, characterID, 1000)
Dim eveAccounts As List(Of EveAI.Live.AccountBalance) = eveAPI.GetCorporationAccountBalance

For i As Integer = 0 To eveAccounts.Count - 1
Dim iAccountKey As Integer = eveAccounts.Item(i).AccountKey
Dim eveAPI_Wallets As New EveAI.Live.EveApi(keyID, _
vCode, _
characterID, _
iAccountKey)

Dim eveJournal As List(Of EveAI.Live.JournalEntry) = eveAPI_Wallets.GetCorporationWalletJournal()
Dim eveTransactions As List(Of EveAI.Live.TransactionEntry) = eveAPI_Wallets.GetCorporationWalletTransactions()


iAccountKey = Nothing

eveJournal = Nothing
eveTransactions = Nothing

eveAPI_Wallets = Nothing
Next i


However the one thing that I have been able to determine is that the GetCorporationWalletJournal() function returns the default number of rows from CCP's API call, 50 rows, and there seems to be no way to itterate through the data sets to collect more rows. CCP has to options, one is FromID and the other is rowCount. RowCount by default is 50, but can go up to 2,560, since I am ever only getting 50 rows back I'd be willing to guess this value is not being passed. Also, the FromID sets the row at which the pulls starts going back in time from. So if you have 2565 rows in total, you could set it at the 2,560th row and get that plus the remaining 5 rows.

With that, I'd like to either suggest or offer up my assistance in modifying the GetCorporationWalletJournal() and GetCorporationWalletTransactions() functions to accept the "fromID" and the "rowCount" values that CCP accepts and input parameters to the API.

Hope this helps and at least makes a little sense. If you have any questions hit me up in game or shoot me a note and I'll help as I can.

Fly safe!
-Thor

Nuq,

The best thing that I can suggest is to create data table object and set it up with a column for each piece of information you want to capture. Then create a for loop to process through the journal entries. Once you have completed that process you can set the data grid's data source equal to the data table and then bind the data sources. For the sake of this example I will assume you are doing this on the individual level and not the corporate level, I have also assumed that you have created an API object and passed it the parameters required to get it to work.

Once you have that taken care of you need to setup a container to collect your data into, in this case if you are going straight to a data grid you can simply build a data table like so:

Dim eveOutput As New DataTable
eveOutput.Columns.Add("accountKey")
eveOutput.Columns.Add("Date")
eveOutput.Columns.Add("TransferType")
eveOutput.Columns.Add("GivingPartyName")
eveOutput.Columns.Add("ReceivingPartyName")
eveOutput.Columns.Add("AdditionalDataName")
eveOutput.Columns.Add("Amount")
eveOutput.Columns.Add("Balance")
eveOutput.Columns.Add("Reason")
eveOutput.Columns.Add("TaxAmount")

eveOutput.Columns("accountKey").DataType = System.Type.GetType("System.Int32")
eveOutput.Columns("Date").DataType = System.Type.GetType("System.DateTime")
eveOutput.Columns("TransferType").DataType = System.Type.GetType("System.String")
eveOutput.Columns("GivingPartyName").DataType = System.Type.GetType("System.String")
eveOutput.Columns("ReceivingPartyName").DataType = System.Type.GetType("System.String")
eveOutput.Columns("AdditionalDataName").DataType = System.Type.GetType("System.String")
eveOutput.Columns("Amount").DataType = System.Type.GetType("System.Decimal")
eveOutput.Columns("Balance").DataType = System.Type.GetType("System.Decimal")
eveOutput.Columns("Reason").DataType = System.Type.GetType("System.String")
eveOutput.Columns("TaxAmount").DataType = System.Type.GetType("System.Decimal")

Once you have done this you can simply execute the call to the API to collect the journal entries, and then process through them like so:

Dim eveJournal As List(Of EveAI.Live.JournalEntry) = eveAPI_Wallets.GetCorporationWalletJournal()
For Each eveEntry As EveAI.Live.JournalEntry In eveJournal
Dim tmpRow As DataRow = eveOutput.NewRow
tmpRow("accountKey") = BLAHH
.
.
.
.
.
eveOutput.Rows.Add(tmpRow)
Next

Then once this is done you can finally say this.
dvDataView.DataSource = eveOutput
dvDataView.DataBind()


Hope this gets you started! Please ping me in game if you have any questions!